Strict

Import agfx

Class TTouchData

	Field hit:TVector2[32]
	Field drag:TVector2[32]
	Field drag_delta:TVector2[32]
	Field up:TVector2[32]
	Field velocity:TVector2[32]
	Field velocity_speed:Float[32]
	Field state:Int[32]
	Field down:Bool[32]
	
	
	Method New()
		Self.Reset()
	End Method
	
	Method Reset:Void()
		For Local i:Int = 0 To 31
			Self.hit[i] 			= New TVector2()
			Self.drag[i] 			= New TVector2()	
			Self.drag_delta[i] 		= New TVector2()	
			Self.up[i] 				= New TVector2()	
			Self.velocity[i]    	= New TVector2()	
			Self.velocity_speed[i]	= 0.0	
			Self.down[i]			= False	
			Self.state[i] 			= 0
		Next
	End Method
	
	
End Class

